home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 August / PCWorld_2001-08_cd.bin / Software / Vyzkuste / codePad / CodePad30.exe / Syntax Definitions / tcltk.def < prev    next >
Text File  |  2000-11-08  |  5KB  |  151 lines
  1. object TPersHolder
  2.   P.Name = 'Tcl/Tk'
  3.   P.SyntaxBlocks = <
  4.     item
  5.       Name = 'Default'
  6.       ID = 0
  7.       UseMetaSymbol = True
  8.       UseMetaToWrapLines = True
  9.       MetaSymbol = '\'
  10.       FIText = 0
  11.       FIIntNum = 1
  12.       FIFloatNum = 2
  13.       FIHexNum = 3
  14.       FISymbol = 7
  15.       UseSymbols = True
  16.       UseComments = True
  17.       UseFullLineComments = True
  18.       UseStrings = True
  19.       UseSingleLineStrings = True
  20.       UseNumbers = True
  21.       UseSuffixedNumbers = True
  22.       UseMultipleNumSuffixes = False
  23.       UsePrefixedIdentifiers = True
  24.       UseKeywords = True
  25.       BlockDelimiters = <>
  26.       FullLineCommentDelimiters = <
  27.         item
  28.           FontID = 4
  29.           LeftDelimiter = '#'
  30.         end>
  31.       SingleLineStringDelimiters = <
  32.         item
  33.           FontID = 5
  34.           LeftDelimiter = '"'
  35.           RightDelimiter = '"'
  36.         end>
  37.       NumSuffixes = <
  38.         item
  39.           LeftDelimiter = 'c'
  40.         end
  41.         item
  42.           LeftDelimiter = 'i'
  43.         end
  44.         item
  45.           LeftDelimiter = 'm'
  46.         end>
  47.       IdentPrefixes = <
  48.         item
  49.           LeftDelimiter = '$'
  50.         end>
  51.       KeywordSets = <
  52.         item
  53.           FontID = 6
  54.           Name = 'commands'
  55.           Keywords = 
  56.             'AFTER,APPEND,ARRAY,BELL,BGERROR,BINARY,BIND,BINDIDPROC,BINDPROC,' +
  57.             'BINDTAGS,BITMAP,BREAK,BUTTON,CANVAS,CATCH,CD,CHECKBUTTON,CLIPBOA' +
  58.             'RD,CLOCK,CLOSE,CONCAT,CONTINUE,DESTROY,ELSE,ENTRY,EOF,ERROR,EVAL' +
  59.             ',EVENT,EXEC,EXIT,EXPR,FBLOCKED,FCONFIGURE,FCOPY,FILE,FILEEVENT,F' +
  60.             'ILENAME,FLUSH,FOCUS,FONT,FOR,FOREACH,FORMAT,FRAME,GETS,GLOB,GLOB' +
  61.             'AL,GRAB,GRID,HISTORY,HTTP,IF,IMAGE,INCR,INFO,INTERP,JOIN,LABEL,L' +
  62.             'APPEND,LIBRARY,LINDEX,LINSERT,LIST,LISTBOX,LLENGTH,LOAD,LOADTK,L' +
  63.             'OWER,LRANGE,LREPLACE,LSEARCH,LSORT,MENU,MESSAGE,NAMESPACE,NAMESP' +
  64.             'UPD,OPEN,OPTION,OPTIONS,PACK,PACKAGE,PHOTO,PID,PKG_MKINDEX,PLACE' +
  65.             ',PROC,PUTS,PWD,RADIOBUTTON,RAISE,READ,REGEXP,REGISTRY,REGSUB,REN' +
  66.             'AME,RESOURCE,RETURN,RGB,SAFEBASE,SCALE,SCAN,SEEK,SELECTION,SEND,' +
  67.             'SENDOUT,SET,SOCKET,SOURCE,SPLIT,STRING,SUBST,SWITCH,TCL,TCLVARS,' +
  68.             'TELL,TEXT,THEN,TIME,TK,TK_BISQUE,TK_CHOOSECOLOR,TK_DIALOG,TK_FOC' +
  69.             'USFOLLOWSMOUSE,TK_FOCUSNEXT,TK_FOCUSPREV,TK_GETOPENFILE,TK_GETSA' +
  70.             'VEFILE,TK_MESSAGEBOX,TK_OPTIONMENU,TK_POPUP,TK_SETPALETTE,TKERRO' +
  71.             'R,TKVARS,TKWAIT,TOPLEVEL,TRACE,UNKNOWN,UNSET,UPDATE,UPLEVEL,UPVA' +
  72.             'R,VARIABLE,VWAIT,WHILE,WINFO,WM'
  73.         end>
  74.       OtherIdentChars = '.0-9A-Z_a-z'
  75.     end>
  76.   P.FontTable = <
  77.     item
  78.       FontID = 0
  79.       GlobalAttrID = 'Whitespace'
  80.       Font.Charset = DEFAULT_CHARSET
  81.       Font.Color = clBlack
  82.       Font.Height = -13
  83.       Font.Name = 'Courier New'
  84.       Font.Style = []
  85.     end
  86.     item
  87.       FontID = 1
  88.       GlobalAttrID = 'Integer'
  89.       Font.Charset = DEFAULT_CHARSET
  90.       Font.Color = clGreen
  91.       Font.Height = -13
  92.       Font.Name = 'Courier New'
  93.       Font.Style = []
  94.     end
  95.     item
  96.       FontID = 2
  97.       GlobalAttrID = 'Float'
  98.       Font.Charset = DEFAULT_CHARSET
  99.       Font.Color = clGreen
  100.       Font.Height = -13
  101.       Font.Name = 'Courier New'
  102.       Font.Style = []
  103.     end
  104.     item
  105.       FontID = 3
  106.       GlobalAttrID = 'Integer'
  107.       Font.Charset = DEFAULT_CHARSET
  108.       Font.Color = clGreen
  109.       Font.Height = -13
  110.       Font.Name = 'Courier New'
  111.       Font.Style = []
  112.     end
  113.     item
  114.       FontID = 4
  115.       GlobalAttrID = 'Comment'
  116.       Font.Charset = DEFAULT_CHARSET
  117.       Font.Color = clGray
  118.       Font.Height = -13
  119.       Font.Name = 'Courier New'
  120.       Font.Style = [fsItalic]
  121.     end
  122.     item
  123.       FontID = 5
  124.       GlobalAttrID = 'String'
  125.       Font.Charset = DEFAULT_CHARSET
  126.       Font.Color = clMaroon
  127.       Font.Height = -13
  128.       Font.Name = 'Courier New'
  129.       Font.Style = []
  130.     end
  131.     item
  132.       FontID = 6
  133.       GlobalAttrID = 'Reserved words'
  134.       Font.Charset = DEFAULT_CHARSET
  135.       Font.Color = clBlue
  136.       Font.Height = -13
  137.       Font.Name = 'Courier New'
  138.       Font.Style = [fsBold]
  139.     end
  140.     item
  141.       FontID = 7
  142.       GlobalAttrID = 'Delimiters'
  143.       Font.Charset = DEFAULT_CHARSET
  144.       Font.Color = clBlack
  145.       Font.Height = -13
  146.       Font.Name = 'Courier New'
  147.       Font.Style = []
  148.     end>
  149.   P.SyntaxVersion = 3
  150. end
  151.